home *** CD-ROM | disk | FTP | other *** search
/ Enter Special 5: Digital Photography / ENTER Special 05.iso / Grafika / Paint Shop Pro 8.0 / psp800ev.exe / Data1.cab / Preset_MagnifyingLens_Backli < prev    next >
Encoding:
Text File  |  2003-04-22  |  2.0 KB  |  61 lines

  1. from JascApp import *
  2.  
  3. def ScriptProperties():
  4.     return {
  5.         'Author': 'Kris Zaklika',
  6.         'Copyright': 'Copyright (C) 2002-2003, Jasc Software Inc., All Rights Reserved.',
  7.         'Description': 'The effect of a backlit transparency. Original idea: Angela M. Cable.',
  8.         'Host': 'Paint Shop Pro',
  9.         'Host Version': '8.00'
  10.         }
  11.  
  12. def Preset_MagnifyingLens():
  13.     return {
  14.         'Darkness': 100, 
  15.         'Defocus': 10, 
  16.         'Frame': {
  17.             'FrameColor': (200,164,18), 
  18.             'Material': App.Constants.LensFrameMaterial.DullRedPlastic, 
  19.             'Style': App.Constants.LensFrameShape.Circular, 
  20.             'Thickness': 11
  21.             }, 
  22.         'Illumination': {
  23.             'LightList': [{
  24.                 'LightColor': (178,97,0), 
  25.                 'LightDirection': (-0.0842,0.4859,0.4738), 
  26.                 'HighlightSize': 70
  27.                 },{
  28.                 'LightColor': (255,255,255), 
  29.                 'LightDirection': (0.794409,0.607383,0), 
  30.                 'HighlightSize': 20
  31.                 },{
  32.                 'LightColor': (128,128,128), 
  33.                 'LightDirection': (-0.0626497,-0.10265,-0.992743), 
  34.                 'HighlightSize': 0
  35.                 }], 
  36.             'MaxAmbience': 83, 
  37.             'MinAmbience': 28
  38.             }, 
  39.         'LensSurface': {
  40.             'EnvironmentMap': {
  41.                 'Active': App.Constants.Boolean.false
  42.                 }, 
  43.             'Gloss': 57, 
  44.             'Magnification': 41, 
  45.             'LensMaterial': {
  46.                 'Color': (166,117,0), 
  47.                 'Pattern': None, 
  48.                 'Gradient': None, 
  49.                 'Texture': None
  50.                 }, 
  51.             'LensOpacity': 13, 
  52.             'Refraction': 57, 
  53.             'ShapeType': App.Constants.LensShape.VCylindrical, 
  54.             'Shininess': 67
  55.             }
  56.         }
  57.  
  58. def Do(Environment):
  59.     App.Do( Environment, 'MagnifyingLens',         Preset_MagnifyingLens())
  60.  
  61.